SSSSSSSSSSSS_ YYY YYY SSSSSSSSSSSS LLL 000000000 AAAAAAAAA 
SSSSSSSSSSSS_ YYY YYY SSSSSSSSSSSS LLL 000000000 AAAAAAAAA 
SSSSSSSSSSSS_ YYY YYY SSSSSSSSSSSS LLL 000000000 AAAAAAAAA 
SSS YYY YYY SSS LLL 000 000 AAA AAA 
SSS vYY YYY SSS LLL 000 000 AAA ABA 
SSS YYY YYY SSS LLL 000 000 AAA AMA 
SSS yyy yYY SSS LLL 000 000 AAA ABA 
SSS yyy yYY SSS LLL 000 000 AAA AAL 
SSS yyy yYY SSS LLL 000 000 AAA AAA 
SSSSSSSSS vYY SSSSSSSSS LLL 000 000 AAA AAA 
SSSSSSSSS vYY SSSSSSSSS LLL 000 000 AAA 
SSSSSSSSS vYY SSSSSSSSS LLL 000 000 AAA AAA 
SSS YYY SSS LLL 000 000 A 
SSS YYY SSS LLL 000 000 AAAAAAAAAAAAAAA 
SSS YYY SSS LLL 000 000 AAAAAAAAAAAAAAA 
SSS vYY SSS) LLL 000 000 AAA 
SSS YYY SSS LLL 000 000 AAA AAA 
SSS YYY SSS LLL 000 000 AAA AAA 
SSSSSSSSSSSS YYY SSSSSSSSSSSS LLELLLLLLLLLLLLL 000000000 AAA AAR 
SSSSSSSSSSSS vYY SSSSSSSSSSSS LELLLLLLLLLLLLL 000000000 AAA AAA 
SSSSSSSSSSSS yyy SSSSSSSSSSSS LLLLLLLLLLLLLLL 000000000 AAA AAA 


**F 1LE®*1D** JOSUB790 
LL III] 000000 SSSSSSSS UU UU BB8BBBBBB 77777777 999999 000000 
LL IH1111 000000 SSSSSSSS UU UU BBBBBBBB 77777777 999999 000090 
LL I] 00 00 SS UU UU BB BB 77 (99 99 00 00 
LL I] 00 00 SS UU UU 8B BB 77 (99 99 00 00 
LL I] 00 00 SS UU UU BB BB 77 (99 99 88 0000 
LL I] 00 00 SS UU UU 8B BB 77: («99 99 00 0000 
LL I] 00 00 SSSSSS UU UU B8BBBBBBB 77 99999999 00 00 00 
LL I] 00 00 SSSSSS UU UU 88888888 77 99999999 00 00 00 
LL I] 00 00 SS UU UU BB =} ] 77 99 0000 00 
LL I] 00 00 SS UU UU BB BB 77 99 a 00 
LL I] 00 00 S$ UU UU 8B BB 77 99 00 00 
LL I] 00 SS UU UU BB BB 77 99 00 00 
LLLLLLLLLL 111111 000000 SSSSSSSS UUUUUUUUUU = BBBBBBBB 77 999999 000000 
LLLLLLLLLL HII] 000000 SSSSSSSS UUUUUUUUUU = BBBBBBBB 77 999999 000000 
LL III] SZSSSSSS 
LL IIIII] SSSSSSSS 
LL I] SS 
LL I] SS 
LL I] SS 
LL I] SS 
LL I] SSSSSS 
LL I] SSSSSS 
LL I] SS 
LL I] SS 
LL I] SS 
LL I] SS 
LLELLLLLLLL IIIT] SSSSSSSS 
LLLLLLLLLL III] SSSSSSSS 
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-NOSHOW CONDITIONALS 


-TITLE LIOSUB790 = LOADABLE 1/0 SUBROUTINES 


-IDENT ‘V04-000' 


Be Be Be Oe Be Oe Be Bs Oe Oe Oe Oe Oe Se Os Oe Oe Oe Os Se Be Oe Be Se Bs Oe Be Oe Be Ss Oe Oe Oe Se Be Se Be Se Be Se Be Se Se Se Bee 
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COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH TH 
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® 
OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
TRANSFERRED. * 
& 

THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE ®* 
AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
CORPORATION. * 
e 

® 

a 

® 

® 


DIGITAL ASSUMES NO RESPONS 7 


IBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH 


L 
S NOT SUPPLIED BY DIGITAL. 
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; FACILITY: 
EXECUTIVE, 1/0 CONTROL ROUTINES 
; ABSTRACT: 
; 1/0 SUBROUTINES WHICH CONTAIN PROCESSOR DEPENDENCIES. 
; AUTHOR: 
N. KRONENBERG, JANUARY 12, 1979. 
; MODIFIED BY: 
v03-012 KDM0096 Kathleen D. Morse 27-Mar-1984 
Add Benety CSR sconning to IOCSPURGDATAP for MicroVAX I. 
(ALL DMA MicroVAX I drivers should call this routine, just 
before calling IOCSREQCOM.) 


v03-011 KDM0081 Kathleen D. Morse 13-Sep-1983 
Create a version for Micro-VAX I. 


COoOooooooo 
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L10SUB790 = LOADABLE 1/0 SUBROUTINES 16-SEP-1984 01:00: AX/VMS Macro v04-00 Pa 
voa=000 Sep 1986 4:10:08 EeySLOA.sReIC1OSUB RAR: 1 = dy 
ie 3 v03-010 TCMO004 Trudy C. Matthews 46-Jan-1982 
fs : Added 11/790-specit path to IOCSPURGDATAP. 
5: v09 TCMO003 Trudy C. Matthews 99-Nov-1982 | 
; Added a .TITLE statenent for L10SUB790. 
: v08 TCMO002 Trud Mathews 29-Jul-1981 
hi : a all "'722"'s 2 "?30"'s. 
1; v07 dy ¢ Matthews 28-F eb-1980 
¢ : changed LOCSPURGDAYA for NEBULA so that it logs | 
: the bus Error Summary register itself when there 
¢ : are Unibus errors reported. | 
0 6 : v06 PK0002 N. KRONENBERG 4=DEC-1979 
3 : REPLACED IOCSPURGDATAP FOR NEBULA 
99 § : v05 NPKO001 N. KRONENBERG 23-AUG-1979 
oo + ; CORRECTED 11/750 CHECK FOR PURGE DONE. 
00 3 F v04 TCMO001 udy :. sHatthews 3-Jul-1979 | 
000 93; Modified IOCSPURGDATAP a NEBUL 
45 94; 
00 95 ;-- 
j 
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ee ce ce ee ca ce ee cc 
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00000001 
00000000 


Restore register 
Return 


—_ 
oO 
nS 


POPR #*M<R4> 
RSB 


.DSABL LSB | 
END | 
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L10SUB790 = LOADABLE 1/0 SUBROUTINES 16-SEP-1984 01:00:5 AX/VMS Macro v04-00 Pa 
Oe°000 PURGE DATAPATH misty y 819838 SYSLOA.SRCIJLIOSUB.MAR;1 ad dh 
133 " -SBTTL PURGE DATAPATH 
133 : IOCSPURGDATAP = PURGE DATAPATH 
141 : This routine purges the caller's buffered datapath, and clears any 
8 142 ; datapath errors. if there was a datapath error, this fact is 
$3 127 ; returned to the caller. 
145 : INPUTS: 
0 149 : R5 = UCB address 
000 163 + OUTPUTS: 
$009 151; RO-R3 altered 
000 136 3 Other registers preserved 
000 153; RO = low bit clear/set if transmission error/success 
000 154; R1 = DPR contents after purge (for register dump by caller) 
000 155; of = address of start of adapter map registers (for reg dump by calier) 
0000 156; R3 = CRB address 
$333 1 
0000 ee 127 -PSECT WIONONPAGED 
44 19) -ENABL LSB 
$000 183 IOCSPURGDATAP: : : 
10 6B 4 165 PUSHR #*M<R4> ; Save register 
53 $3 AS DO 000 198 MOVL UCBSL_CRB(RS5S) ,R3 > Get CRB address 
52 38 B83 0 9006 167 MOVL a@CRBSC_INTD+VECS$L_ADP(R3),R2 ; Get start of adapter register space 
4 EF QOOA 199 EXTZV #VECSV_DATAPATH,- ; Extract datapath # 
; 00c 170 #VEC$S_DATAPATH,=- : rom 
51 37 A 90 171 CRBSL_INTD*VECSE DATAPATH(R3) ,R1 
54 40 A241 bf 1p 1 ¢ MOVAL UBASL~DPR(R2)CR1J,R4 : Get address of DPR 
64 O01 IF 01 1 ASHL #UBAST_DPR_BNE,#1,(R4) ; Purge datapath 
51 64 00 0019 174 MOVL (R4),R 3; Get DPR contents 
08 51 +#1E €1 gic 175 BBC #UBA$V_DPR_XMTER,R1,20$ ; Branch if no error 
64 01 1 8 1 § ASHL SIOAEG PPE HATER HS 9 SO ; Clear error in DPR 
30 D4 0024 =#1 CLRL ® ; Set to return transfer error 
8 11. 00 $ 1 8 RB 30$ ; Join common code 
50 1 9A 00 1 eps: MOVZBL #1,R0 3; Set to return transfer success 
52 0800 C2 DE 00 ' , 0$: OVAL UBASL_MAP(R2),R2 ; Return addr of ist map register 
1 
1 
1 
aie 
: 0 


oo 


L10SUB790 
Symbol table 


C750_LIKE 
C780 LIKE 
TYP 


= LOAD 


RBSL_INTD 
LOCSPORGDATAP 


UCBSL~ 
VEC$B_DATAPATH 
VECSL-ADP 
VEC$S~DATAPATH 
VECS$VDATAPATH 


PSECT name 


000000 
000000 
000000 


Page faults 


Initialization 
Command processing 


Pass 1 

Symbol table sort 
Pass 2 

Symbol table output 
Psect synopsis output 


Cross-reference output 
Assembler run totals 


[hg working set Limit was 1350 pages. 
44289 bytes (87 pages) of virtual memo 
There were 50 pages of symbol table sp 


source Lines were read in Pass 1, 
pages of virtual memory were used t 


iv 


i 35 
ABLE 1/0 SUBROUTINES 16-SEP-1984 01:00: AX/VMS Macro V04-00 Pa 
gee 1 obec 8:98:38 SYSLOA.SRCJLIOSUB.MAR; 1 ” 3) 
4 | 
& 
RG 02 
M | 
43 | 
i 
2 
{3 
14 
B88 
00 
powwwoowocceeoooe + 
! Psect synopsis ! 
tion PSECT No. Attributes 
00 <¢ 0.) 89 ( 0.) NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
9 ( 0.) 1¢ 1.) NOPIC USR CON ABS LCL NOSHR EXE RD WRT NOVEC BYTE 
( 51.) 02 ¢ 2.) NOPIC USR CON REL LCL NOSHR EXE R&D WRT NOVEC BYTE 
power mewooewo eee ee oooonon+ 
; Performance indicators : 
CPU Time Elapsed Time 
0:00:00. 0:00:01.51 
0:00: 0:57 0:00: 04-38 
0:00:05.04 :00:18. 2 
0:00:00.77 0:00: ¢-6 
0: : 9 0: : 6. 3 
00:00. :00:00.01 
ae eae 
(00:07:45 00:00:88.7 
ry were used to buffer_the intermediate code. 


ace allocated to hold 773 non-local and 
producing 13 object records in Pass 2 
o define 16 macros. 


Local symbols. 


L10SUB790 
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teecece Reena ee sen nome eee aaa + 


! ; Macro library statistics ! 


seas wer mec crewronee aannnenneh 


Macro Library name 


Sitt tt Bs ne. On) 18m. -MLB;1 0 
SSSDUA 1 9 
“$255$DUA28 reve iB STARLET. MLB; 2 4 
TOTALS ace “Cibraries) 13 


864 GETS were required to define 13 macros. 
There were no errors, warnings or information messages. 


AX/VMS Ma 
SYSLOA. SRC 


cro 
RCILI 


v04-00 
LIOSUB.MAR; 1 


MACRO/LIS=L1S$:L10SUB790/0BJ=0BJ$:LIOSUB790 MSRC$:CPUSW790/UPDATE=(ENHS : CPUSW790) +MSRC$:L I OSUB/UPDATE=(ENH$:LIOSUB) +EXECML$/LIB+LIB$ 
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